 Loading |
|
Loading |
| VBScript |
| JavaScript |
| Powershell |
Search Options: Append Text to a Word Document
|
||
|
' Description: Demonstration script that appends the current date to the existing Microsoft Word document C:\Scripts\Word\Testdoc.doc.
Const END_OF_STORY = 6 Const MOVE_SELECTION = 0 Set objWord = CreateObject("Word.Application") objWord.Visible = True Set objDoc = objWord.Documents.Open("c:\scripts\word\testdoc.doc") Set objSelection = objWord.Selection objSelection.EndKey END_OF_STORY, MOVE_SELECTION objSelection.TypeParagraph() objSelection.TypeParagraph() objSelection.Font.Size = "14" objSelection.TypeText "" & Date() objSelection.TypeParagraph() objSelection.TypeParagraph() objSelection.Font.Size = "10" | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: | ||
